global direction,pillarEat,trollDead,blastDam,holeDam,chase,blasting
if direction = "east" or direction = "rear" then
if blastDam = true then
go to card id 26754
exit move
end if
if holeDam = true then
go to card id 27307
exit move
end if
go to card id 26200
exit move
end if
if direction = "west" then
beep
put "Surly you don't want to walk off the ledge and fall. Take the stairs down." into field 3
exit move
end if
if direction = "down" or direction = "south" then
go to card id 33443
exit move
end if
pass move
end move
on closeCard
set the cursor to 4
put "" into field 3
end closeCard
on take
global object,carried
-- remember to update carried if you do not pass take
pass take
end take
on drop
global object,dropRoom,carried
answer "Drop object onto ledge, or off the ledge?" with "off ledge"or"on ledge"
if it="off ledge" then put "33443" into dropRoom
-- remember to update carried if you do not pass drop
pass drop
end drop
on use
global object,carried
-- update carried if use results in loss of object
pass use
end use
-- part 16 (button)
-- low flags: 80
-- high flags: 2000
-- rect: left=194 top=231 right=267 bottom=228
-- title width / last selected line: 0
-- icon id / first selected line: 9301 / 9301
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: knife
----- HyperTalk script -----
on mouseUp
global takeFlag,examFlag,object,cardID
put the name of the target into object
if takeFlag = true
then send take to card id cardID
else put "a knife" into field 3
put false into examFlag
end mouseUp
-- part 17 (button)
-- low flags: 80
-- high flags: 2000
-- rect: left=126 top=231 right=267 bottom=160
-- title width / last selected line: 0
-- icon id / first selected line: 1015 / 1015
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: nodule
----- HyperTalk script -----
on mouseUp
global takeFlag,examFlag,object,cardID
put the name of the target into object
if takeFlag = true
then send take to card id cardID
else put "a silicon sphere" into field 3
put false into examFlag
end mouseUp
-- part 18 (button)
-- low flags: 80
-- high flags: 2000
-- rect: left=160 top=232 right=268 bottom=194
-- title width / last selected line: 0
-- icon id / first selected line: 14953 / 14953
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: ladder
----- HyperTalk script -----
on mouseUp
global takeFlag,examFlag,object,cardID
put the name of the target into object
if takeFlag = true
then send take to card id cardID
else put "a rope ladder" into field 3
put false into examFlag
end mouseUp
-- part 19 (button)
-- low flags: 80
-- high flags: 2000
-- rect: left=59 top=230 right=266 bottom=93
-- title width / last selected line: 0
-- icon id / first selected line: 1019 / 1019
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: bomb
----- HyperTalk script -----
on mouseUp
global takeFlag,examFlag,object,cardID
put the name of the target into object
if takeFlag = true
then send take to card id cardID
else put "a time bomb" into field 3
put false into examFlag
end mouseUp
-- part 20 (button)
-- low flags: 80
-- high flags: 2000
-- rect: left=92 top=230 right=266 bottom=126
-- title width / last selected line: 0
-- icon id / first selected line: 24317 / 24317
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: key
----- HyperTalk script -----
on mouseUp
global takeFlag,examFlag,object,cardID
put the name of the target into object
if takeFlag = true
then send take to card id cardID
else put "a key" into field 3
put false into examFlag
end mouseUp
-- part 21 (button)
-- low flags: 80
-- high flags: 2000
-- rect: left=139 top=195 right=231 bottom=173
-- title width / last selected line: 0
-- icon id / first selected line: 7012 / 7012
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: gem
----- HyperTalk script -----
on mouseUp
global takeFlag,examFlag,object,cardID
put the name of the target into object
if takeFlag = true
then send take to card id cardID
else put "a glowing gem" into field 3
put false into examFlag
end mouseUp
-- part 22 (button)
-- low flags: 80
-- high flags: 2000
-- rect: left=105 top=195 right=231 bottom=139
-- title width / last selected line: 0
-- icon id / first selected line: 23078 / 23078
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: orb
----- HyperTalk script -----
on mouseUp
global takeFlag,examFlag,object,cardID
put the name of the target into object
if takeFlag = true
then send take to card id cardID
else put "a crystal orb" into field 3
put false into examFlag
end mouseUp
-- part 33 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=94 top=41 right=89 bottom=134
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name:
----- HyperTalk script -----
on mouseUp
global examFlag,direction,cardID,takeFlag
if takeFlag then
put "You can't use that door unless you can get there." into field 3
put false into takeFlag
else
put "A ledge and doorway on the opposite wall of the great chamber below." into field 3
put false into examFlag
end if
end mouseUp
-- part 35 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=1 top=215 right=261 bottom=55
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name:
----- HyperTalk script -----
on mouseUp
global examFlag,direction,cardID
if examFlag then
put "a stairway leading down into the great chamber" into field 3
put false into examFlag
else
put "down" into direction
send move to card id cardID
end if
end mouseUp
-- part 36 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=230 top=164 right=190 bottom=250
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name:
----- HyperTalk script -----
on mouseUp
global examFlag,takeFlag,direction,cardID
if examFlag then
put "A doorway in the chamber below." into field 3
put false into examFlag
else
put "You must go down there before you can use that door." into field 3
put false into takeFlag
end if
end mouseUp
-- part 40 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=51 top=182 right=203 bottom=84
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name:
----- HyperTalk script -----
on mouseUp
global examFlag,takeFlag,direction,cardID
if takeFlag then
put "You can't take it -- it's in the room below you." into field 3
put false into takeFlag
else
put "Looks like a giant wash tub in the room below." into field 3
put false into examFlag
end if
end mouseUp
-- part 42 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=119 top=131 right=157 bottom=143
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name:
----- HyperTalk script -----
on mouseUp
global examFlag,takeFlag,direction,cardID
if examFlag then
put "A doorway in the chamber below." into field 3
put false into examFlag
else
put "You must go down there before you can use that door." into field 3
put false into takeFlag
end if
end mouseUp
-- part contents for background part 25
----- text -----
East Ledge
(looking west)
-- part contents for background part 24
----- text -----
You are on a ledge overlooking a huge chamber to the west. A stone stairway winds down to the floor of the chamber. A doorway to the east leads to the dam room.